program LanMonitore;

uses
  Forms,
  Windows,
  Classes,
  SysUtils,
  DBTables,
  DBIProcs,
  Dialogs,
  Principal in 'Units\Principal.pas' {FrmPrincipal},
  Funcaos in 'Units\Funcaos.pas',
  UFrmDialogo in 'Units\UFrmDialogo.pas' {FrmDialogo},
  UFrmSplash in 'Units\UFrmSplash.pas' {FrmSplash},
  Modulo in 'Units\Modulo.pas' {DMEscola: TDataModule},
  UFrmUsuarios in 'Units\UFrmUsuarios.pas' {FrmUsuarios},
  UFrmLogin in 'Units\UFrmLogin.pas' {FrmLogin},
  UFrmEmpresa in 'Units\UFrmEmpresa.pas' {Frmempresa},
  UFrmclientes in 'Units\UFrmclientes.pas' {FrmClientes},
  UFrmGrupo in 'Units\UFrmGrupo.pas' {FrmGrupo},
  UTarifas in 'Units\UTarifas.pas' {FrmTarifas},
  UFrmGerenciamento in 'Units\UFrmGerenciamento.pas' {Frmgerenciamento},
  Constantes in 'Shared\Constantes.pas',
  UFrmip in 'Units\UFrmip.pas' {Frmip},
  UFrmProduos in 'Units\UFrmProduos.pas' {FrmProdutos},
  UFrmProabaixo in 'Units\UFrmProabaixo.pas' {FrmProabaixo},
  UFrmReposicao in 'Units\UFrmReposicao.pas' {FrmReposicao},
  UFrmLocatecli in 'Units\UFrmLocatecli.pas' {FrmLocatecli},
  UFrmVendas in 'Units\UFrmVendas.pas' {FrmVendas},
  UFrmvendaacesso in 'Units\UFrmvendaacesso.pas' {Frmvendaacesso},
  UFrmContafinal in 'Units\UFrmContafinal.pas' {FrmContafinal},
  UFrmRetiradas in 'Units\UFrmRetiradas.pas' {FrmRetiradas},
  UFrmreforcos in 'Units\UFrmreforcos.pas' {Frmreforcos},
  UFrmfechamento in 'Units\UFrmfechamento.pas' {Frmfechamento},
  Uqrecibo in 'Units\Uqrecibo.pas' {RelCaixa},
  UFrmNiver in 'Units\UFrmNiver.pas' {Frmniver},
  UFrmmessage in 'Units\UFrmmessage.pas' {Frmmessage},
  UFramessage in 'Units\UFramessage.pas' {framessage: TFrame},
  UFrmrelniver in 'Units\UFrmrelniver.pas' {Frmrelniver},
  Ufrmconsultaacesso in 'Units\Ufrmconsultaacesso.pas' {Frmconsultaacesso},
  Ufrmrelacessos in 'Units\Ufrmrelacessos.pas' {Frmrelacessos},
  UFrmRegistro in 'Units\UFrmRegistro.pas' {FrmRegistro},
  UFrmlancconta in 'Units\UFrmlancconta.pas' {Frmlancconta},
  UFrmMsgClient in 'Units\UFrmMsgClient.pas' {FrmMsgClient};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := 'LanMaxx 2.0 - Sistema de Controle e Monitoração de Rede';
  FrmSplash.Conf('\System\FORMATS\NUMBER','DECIMALSEPARATOR',',');
  FrmSplash.Conf('\System\Init','Local Share','TRUE');
  FrmSplash.Conf('\Drivers\Paradox\Init','Net Dir',ExtractFilePath(Application.ExeName));
  Session.Close;
  Session.DeleteAlias('SAE');
  Session.AddStandardAlias('SAE',ExtractFilePath(Application.ExeName) + 'Tabelas','Paradox');
  Session.SaveConfigFile;
  Session.Open;
  Application.CreateForm(TDMEscola, DMEscola);
  Application.CreateForm(TFrmPrincipal, FrmPrincipal);
  Application.CreateForm(TFrmMsgClient, FrmMsgClient);
  Application.Run;
end.
